home *** CD-ROM | disk | FTP | other *** search
- object PrintWholeTree: TPrintWholeTree
- Left = 147
- Top = 165
- BorderStyle = bsDialog
- Caption = 'Print Tree'
- ClientHeight = 298
- ClientWidth = 281
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = True
- Position = poScreenCenter
- OnActivate = FormActivate
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Button2: TButton
- Left = 200
- Top = 264
- Width = 75
- Height = 25
- Caption = '&Close'
- TabOrder = 1
- OnClick = Button2Click
- end
- object Button3: TButton
- Left = 120
- Top = 264
- Width = 75
- Height = 25
- Caption = '&Print'
- TabOrder = 0
- OnClick = PrintTree
- end
- object GroupBox2: TGroupBox
- Left = 8
- Top = 16
- Width = 129
- Height = 57
- Caption = ' Orientation '
- TabOrder = 2
- object LS: TRadioButton
- Left = 16
- Top = 32
- Width = 98
- Height = 17
- Caption = 'Landscape'
- Checked = True
- TabOrder = 1
- TabStop = True
- end
- object PT: TRadioButton
- Left = 16
- Top = 16
- Width = 98
- Height = 17
- Caption = 'Portrait'
- TabOrder = 0
- end
- end
- object CheckBox1: TCheckBox
- Left = 8
- Top = 224
- Width = 137
- Height = 17
- Caption = 'Print selected items only'
- Checked = True
- State = cbChecked
- TabOrder = 6
- end
- object Button1: TButton
- Left = 8
- Top = 264
- Width = 75
- Height = 25
- Caption = '&Setup'
- TabOrder = 7
- OnClick = Button1Click
- end
- object GroupBox1: TGroupBox
- Left = 8
- Top = 104
- Width = 265
- Height = 97
- Caption = ' Size '
- TabOrder = 5
- object RadioButton2: TRadioButton
- Left = 8
- Top = 40
- Width = 113
- Height = 17
- Caption = '2 x 2 pages (4)'
- TabOrder = 1
- end
- object RadioButton1: TRadioButton
- Left = 8
- Top = 24
- Width = 113
- Height = 17
- Caption = '1 page'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object RadioButton4: TRadioButton
- Left = 8
- Top = 72
- Width = 113
- Height = 17
- Caption = '4 x 4 pages (16)'
- TabOrder = 3
- end
- object RadioButton5: TRadioButton
- Left = 136
- Top = 24
- Width = 113
- Height = 17
- Caption = '5 x 5 pages (25)'
- TabOrder = 4
- end
- object RadioButton6: TRadioButton
- Left = 136
- Top = 40
- Width = 113
- Height = 17
- Caption = '6 x 6 pages (36)'
- TabOrder = 5
- end
- object RadioButton7: TRadioButton
- Left = 136
- Top = 56
- Width = 113
- Height = 17
- Caption = '7 x 7 pages (49)'
- TabOrder = 6
- end
- object RadioButton3: TRadioButton
- Left = 8
- Top = 56
- Width = 113
- Height = 17
- Caption = '3 x 3 pages (9)'
- TabOrder = 2
- end
- object RadioButton8: TRadioButton
- Left = 136
- Top = 72
- Width = 113
- Height = 17
- Caption = '8 x 8 pages (64)'
- TabOrder = 7
- end
- end
- object GroupBox3: TGroupBox
- Left = 144
- Top = 16
- Width = 129
- Height = 57
- Caption = ' Line thickness '
- TabOrder = 3
- object Shape1: TShape
- Left = 56
- Top = 16
- Width = 65
- Height = 33
- Brush.Style = bsClear
- end
- object ComboBox1: TComboBox
- Left = 16
- Top = 22
- Width = 33
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 0
- OnChange = ComboBox1Change
- Items.Strings = (
- '1'
- '2'
- '3'
- '4'
- '5')
- end
- end
- object Edit1: TEdit
- Left = 88
- Top = 80
- Width = 145
- Height = 21
- TabStop = False
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 8
- Text = 'Edit1'
- end
- object Edit2: TEdit
- Left = 240
- Top = 80
- Width = 33
- Height = 21
- TabStop = False
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 9
- Text = 'Edit2'
- end
- object Button4: TButton
- Left = 8
- Top = 78
- Width = 75
- Height = 25
- Caption = 'Tree font:'
- TabOrder = 4
- OnClick = Button4Click
- end
- object Panel1: TPanel
- Left = 288
- Top = 8
- Width = 249
- Height = 249
- BevelInner = bvLowered
- BorderWidth = 3
- Caption = 'Preview'
- TabOrder = 10
- object Image1: TImage
- Left = 5
- Top = 5
- Width = 239
- Height = 239
- Align = alClient
- end
- end
- object Button5: TButton
- Left = 288
- Top = 264
- Width = 249
- Height = 25
- Caption = 'Click here for preview'
- TabOrder = 11
- TabStop = False
- OnClick = Button5Click
- end
- object PrinterSetupDialog1: TPrinterSetupDialog
- Left = 184
- Top = 216
- end
- object PrintDialog1: TPrintDialog
- Options = [poPrintToFile]
- Left = 128
- Top = 216
- end
- end
-